// Text of project Deletion Script written on 11/29/95 at 11:48 AM
// Beginning of file Main Slip.t

// Before Script for "_view000"
// Copyright  1995 by Apple Computer, Inc. All rights reserved.


_view000 :=
    {viewBounds: {left: 4, top: 46, right: 176, bottom: 162}, _proto: @180};

_view001 :=
    {
     text:
       "This app does absolutely nothing other than demonstrate DeletionScripts.\n\nHave a nice day."
     ,
     viewBounds: {left: 8, top: 16, right: 168, bottom: 96},
     viewJustify: 0,
     _proto: @218
    };
AddStepForm(_view000, _view001);




constant |layout_Main Slip.t| := _view000;
// End of file Main Slip.t
// Beginning of text file Special Scripts.f
// Copyright  1995 by Apple Computer, Inc. All rights reserved.

InstallScript :=	func(partFrame, removeFrame)	// removeFrame parameter is not needed for form parts
					begin
						print("Executing InstallScript.");
					end;

RemoveScript :=		func(partFrame)
					begin
						print("Executing RemoveScript.");
					end;

SetPartFrameSlot(	'DeletionScript,
					func()
					begin
						print("Executing DeletionScript.");
					end	);
// End of text file Special Scripts.f



